home *** CD-ROM | disk | FTP | other *** search
/ Hidden Truth / Hidden Truth.iso / amiga / aweb_super72128 < prev    next >
Encoding:
Text File  |  1997-03-06  |  1.1 KB  |  38 lines
  1. c:requestchoice >env:rcs128 "Welcome To The Hidden Truth" "Screenmode: *nSuper72 Super Hi-Res Laced *n 800x600 *n  128 Colours *n *nSelect from below whether you would like to *nopen your screen in colour or greyscale" " Colour | Greyscale | Cancel "
  2.  
  3. if $rcs128 eq 1
  4.  
  5.   failat 100
  6.   stack >NIL: 20000
  7.   assign >NIL: devs: Truth:amiga/devs
  8.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  9.   assign >NIL: sys: Truth:AMIGA ADD
  10.   assign >NIL: libs: Truth:amiga/libs add
  11.   assign >NIL: fonts: Truth:amiga/fonts add
  12.   assign >NIL: env: Truth:amiga/env-super72 add
  13.   Assign >NIL: JPEGTMP: "ram:"
  14.   C:AddDataTypes >NIL: REFRESH QUIET
  15.   assign >NIL: devs: sys:devs
  16.   aweb >NIL: config aweb_super72128
  17.  
  18. endif
  19.  
  20. if $rcs128 eq 2
  21.  
  22.   failat 100
  23.   stack >NIL: 20000
  24.   assign >NIL: devs: Truth:amiga/devs
  25.   assign >NIL: LIBS: Truth:AMIGA/Classes ADD
  26.   assign >NIL: sys: Truth:AMIGA ADD
  27.   assign >NIL: libs: Truth:amiga/libs add
  28.   assign >NIL: fonts: Truth:amiga/fonts add
  29.   assign >NIL: env: Truth:amiga/env-multiscan add
  30.   Assign >NIL: JPEGTMP: "ram:"
  31.   C:AddDataTypes >NIL: REFRESH QUIET
  32.   assign >NIL: devs: sys:devs
  33.   aweb >NIL: config aweb_super72128g
  34.  
  35. else
  36.   endcli 
  37. endif
  38.